package com.ruoyi.project.bid.service.impl;

import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.exception.CustomException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.framework.aspectj.lang.annotation.DataScope;
import com.ruoyi.framework.web.domain.TreeSelect;
import com.ruoyi.project.bid.domain.Category;
import com.ruoyi.project.bid.mapper.CategoryMapper;
import com.ruoyi.project.bid.service.ICategoryService;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.util.*;
import java.util.stream.Collectors;

/**
 * 部门管理 服务实现
 * 
 * @author lidong
 */
@Service
public class CategoryServiceImpl implements ICategoryService
{
    @Autowired
    private CategoryMapper deptMapper;

    /**
     * 查询部门管理数据
     * 
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<Category> selectDeptList(Category dept)
    {
        return deptMapper.selectDeptList(dept);
    }

    /**
     * 构建前端所需要树结构
     * 
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<Category> buildDeptTree(List<Category> depts)
    {
        List<Category> returnList = new ArrayList<Category>();
        List<Long> tempList = new ArrayList<Long>();
        for (Category dept : depts)
        {
            tempList.add(dept.getCategoryId());
        }
        for (Iterator<Category> iterator = depts.iterator(); iterator.hasNext();)
        {
            Category dept = (Category) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId()))
            {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = depts;
        }
        return returnList;
    }

    public static List<Category> convertListToSortedTree(List<Category> flatList) {
        // 将节点按照 parentId 分组
        Map<Long, List<Category>> groupedByParentId = flatList.stream().collect(Collectors.groupingBy(Category::getParentId));

        // 获取顶层节点
        List<Category> rootNodes = groupedByParentId.get(0L);

        // 对根节点进行排序
        rootNodes.sort(Comparator.comparing(Category::getOrderNum));

        // 递归排序子节点
        sortChildren(rootNodes, groupedByParentId);

        return rootNodes;
    }

    private static void sortChildren(List<Category> nodes, Map<Long, List<Category>> groupedByParentId) {
        for (Category node : nodes) {
            List<Category> children = groupedByParentId.get(node.getCategoryId());

            if (children != null) {
                // 对子节点进行排序
                children.sort(Comparator.comparing(Category::getOrderNum));

                // 递归排序子节点的子节点
                sortChildren(children, groupedByParentId);

                // 将排序后的子节点设置给父节点
                node.setChildren(children);
            }
        }
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<TreeSelect> buildSortTree(List<Category> depts) {
        List<Category> deptTrees = convertListToSortedTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 构建前端所需要下拉树结构
     * 
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<Category> depts)
    {
        List<Category> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     * 
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Integer> selectDeptListByRoleId(Long roleId)
    {
        return deptMapper.selectDeptListByRoleId(roleId);
    }

    /**
     * 根据部门ID查询信息
     * 
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public Category selectDeptById(Long deptId)
    {
        return deptMapper.selectDeptById(deptId);
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     * 
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId)
    {
        return deptMapper.selectNormalChildrenDeptById(deptId);
    }

    /**
     * 是否存在子节点
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId)
    {
        int result = deptMapper.hasChildByCategoryId(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 查询部门是否存在用户
     * 
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId)
    {
        int result = deptMapper.checkDeptExistUser(deptId);
        return result > 0 ? true : false;
    }

    /**
     * 校验部门名称是否唯一
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(Category dept)
    {
        Long deptId = StringUtils.isNull(dept.getCategoryId()) ? -1L : dept.getCategoryId();
        Category info = deptMapper.checkDeptNameUnique(dept.getCategoryName(), dept.getParentId());
        if (StringUtils.isNotNull(info) && info.getCategoryId().longValue() != deptId.longValue())
        {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 新增保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int insertDept(Category dept)
    {
        String comId = SecurityUtils.getCurrComId();
        // 新增顶级部门
        if (null == dept.getParentId()) {
            dept.setParentId(0L);
            if (deptMapper.countTopByParentId(comId) >= 1) {
                throw new CustomException("只能添加一个顶级部门");
            }
            dept.setAncestors("0");
            dept.setComId(comId);
            dept.setStatus("0");
            dept.setDelFlag("0");
            return deptMapper.insertDept(dept);
        }

        Category info = deptMapper.selectDeptById(dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus()))
        {
            throw new CustomException("部门停用，不允许新增");
        }
        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        dept.setComId(comId);

        // 根据pid，查询所有children
        Category category = new Category();
        category.setParentId(dept.getParentId());
        List<Category> children = deptMapper.selectDeptList(category);
        // 找到排序最大的元素
        Optional<Category> maxCategory = children.stream().max(Comparator.comparing(Category::getOrderNum));
        // 如果有，+1给当前节点
        maxCategory.ifPresent(el -> dept.setOrderNum(el.getOrderNum() + 1));

        return deptMapper.insertDept(dept);
    }

    /**
     * 修改保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(Category dept)
    {
        Category newParentDept = deptMapper.selectDeptById(dept.getParentId());
        Category oldDept = deptMapper.selectDeptById(dept.getCategoryId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept))
        {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getCategoryId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getCategoryId(), newAncestors, oldAncestors);
        }
        int result = deptMapper.updateDept(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus()))
        {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatus(dept);
        }
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     * 
     * @param dept 当前部门
     */
    private void updateParentDeptStatus(Category dept)
    {
        String updateBy = dept.getUpdateBy();
        dept = deptMapper.selectDeptById(dept.getCategoryId());
        dept.setUpdateBy(updateBy);
        deptMapper.updateDeptStatus(dept);
    }

    /**
     * 修改子元素关系
     * 
     * @param deptId 被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors)
    {
        List<Category> children = deptMapper.selectChildrenDeptById(deptId);
        for (Category child : children)
        {
            child.setAncestors(child.getAncestors().replace(oldAncestors, newAncestors));
        }
        if (children.size() > 0)
        {
            deptMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId)
    {
        return deptMapper.deleteDeptById(deptId);
    }

    @Override
    @Transactional
    public int sortCategory(Long pid, List<Long> ids) {
        Category category = null;
        int result = 1;
        try {
            for (int i = 0; i < ids.size(); i++) {
                category = deptMapper.selectDeptById(ids.get(i));
                if (!Objects.isNull(category)) {
                    category.setOrderNum(i);
                    category.setParentId(pid);
                    deptMapper.updateDept(category);
                }
            }
        } catch (Exception e) {
            result = 0;
        }
        return result;
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<Category> list, Category t)
    {
        // 得到子节点列表
        List<Category> childList = getChildList(list, t);
        t.setChildren(childList);
        for (Category tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                // 判断是否有子节点
                Iterator<Category> it = childList.iterator();
                while (it.hasNext())
                {
                    Category n = (Category) it.next();
                    recursionFn(list, n);
                }
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<Category> getChildList(List<Category> list, Category t)
    {
        List<Category> tlist = new ArrayList<Category>();
        Iterator<Category> it = list.iterator();
        while (it.hasNext())
        {
            Category n = (Category) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getCategoryId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<Category> list, Category t)
    {
        return getChildList(list, t).size() > 0 ? true : false;
    }
}
